home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 21
/
Cream of the Crop 21 (Terry Blount) (October 1996).iso
/
math
/
coeli376.zip
/
INSTALL.BAT
< prev
next >
Wrap
DOS Batch File
|
1996-07-30
|
5KB
|
269 lines
@echo off
cls
Echo NOTE TO DISTRIBUTORS:
Echo This installer will only work if the source drive is a floppy with
Echo COELI376.EXE in the root directory along with INSTALL.BAT
Echo.
Echo IF YOU HAVE PLACED THE ABOVE FILES IN YOUR OWN ARCHIVE ON THE FLOPPY
Echo THIS UTILITY WILL NOT WORK.
Echo.
Echo Your A: drive directory should look something like this:
Echo.
Echo Volume in drive A is COELI376
Echo Volume Serial Number is 3C5D-0FEA
Echo Directory of A:\
Echo.
Echo VESA {DIR} 05.05.96 7.25
Echo COELI376 EXE 459 544 05.05.96 7.22
Echo FILELIST DOC 1 947 05.05.96 7.36
Echo DISTRIB TXT 1 415 05.05.96 7.31
Echo INSTALL BAT 2 813 05.05.96 7.27
Echo INSTALL TXT 3 757 05.05.96 7.39
Echo 7 file(s) 469 476 bytes
Echo 709 632 bytes free
Echo.
Echo.
Pause
set adr=A:
set cdr=C:
set cp=\COELI-3
set vdr=N
:start
cls
Echo COELI - ELECTRIC PLANISPHERE - INSTALLATION
Echo -------------------------------------------
Echo.
Echo.
Echo 1) Read installation instructions
Echo 2) Print installation instructions
Echo 3) Attempt automatic installation
Echo 4) Exit
Echo.
Echo.
choice /c:1234 Answer by number -
Echo.
Echo.
if errorlevel 4 goto end
if errorlevel 3 goto Auto_installation
if errorlevel 2 goto Print_instructions
if errorlevel 1 goto Read_instructions
:Print_instructions
cls
if exist INSTALL.DOC goto do_print
goto dont_print
:do_print
Echo Please ensure your printer is ready and on line.
Echo To cancel, press [CTRL]+C
Echo.
Pause
cls
Echo Please wait. Printing installation instructions...
copy INSTALL.DOC PRN >NUL
Echo.
Echo Printing complete.
Echo.
Pause
Goto start
:dont_print
Echo Sorry. Can't find the file INSTALL.DOC
Echo.
:out_print
pause
goto start
:Read_instructions
cls
Echo Reading Coeli installation instructions...
if exist install.doc goto do_read
goto dont_read
:do_read
type install.doc |more
Pause
goto out_read
:dont_read
Echo Can't find the file INSTALL.DOC...
:out_read
goto start
:Auto_installation
CLS
Echo COELI - AUTOMATIC INSTALLATION
Echo ------------------------------
Echo.
Echo.
choice /c:abcdefghi Type the drive-letter you're installing FROM -
if errorlevel 9 SET adr=I:
if errorlevel 8 SET adr=H:
if errorlevel 7 SET adr=G:
if errorlevel 6 SET adr=F:
if errorlevel 5 SET adr=E:
if errorlevel 4 SET adr=D:
if errorlevel 3 SET adr=C:
if errorlevel 2 SET adr=B:
if errorlevel 1 SET adr=A:
Echo Source drive is %adr%
:next_q
choice /c:abcdefghi Type the drive-letter you're installing TO -
if errorlevel 9 SET adr=I:
if errorlevel 8 SET adr=H:
if errorlevel 7 SET adr=G:
if errorlevel 6 SET adr=F:
if errorlevel 5 SET adr=E:
if errorlevel 4 SET adr=D:
if errorlevel 3 SET adr=C:
if errorlevel 2 SET adr=B:
if errorlevel 1 SET adr=A:
Echo Target drive is %cdr%
Echo A directory called %cp% will be created on your target drive.
Echo.
choice /c:yn Shall we proceed with installation -
If errorlevel 2 goto start
:phase_1
Echo.
Echo Please wait. Starting installation...
%cdr%
md %cp%
if exist %adr%\COELI376.exe copy %adr%\COELI376.exe %cp%
cd %cp%
if exist COELI376.exe COELI376
if exist COELI376.exe del COELI376.exe
md vesa
cd vesa
md univbe50
cd univbe50
md doc
cd ..
cd ..
cd ..
if exist %adr%\vesa\univbe50\univbe.exe copy %adr%\vesa\univbe50\*.* %cp%\vesa\univbe50
if exist %adr%\vesa\univbe50\doc\univbe.doc copy %adr%\vesa\univbe50\doc\*.* %cp%\vesa\univbe50\doc
if exist %cp\vesa\univbe50\univbe.exe set vdr=Y
choice /c:yn Attempt to install Vesa driver -
if errorlevel=2 goto phase_2
:Vdr_install
Echo.
if %vdr%==Y Echo Attempting to install Vesa driver...
%cdr%
cd %cp%
vesa\univbe50\univbe
:phase_2
%cdr%
if exist %cp%\coeli.exe cd %cp%
cls
Echo.
choice /c:yn Print Coeli's single-page key guide -
if errorlevel=2 goto end
:Print_keyguide
if exist coelikey goto do_kprint
goto dont_kprint
:do_kprint
Echo.
Echo Please ensure your printer is ready and on line.
Echo To cancel, press [CTRL]+C
Echo.
Pause
Echo.
Echo.
Echo Printing help sheet...
copy COELIKEY PRN >NUL
Echo.
Echo Printing complete.
Echo.
Pause
:dont_kprint
:end
Echo.
Echo Thanks. Have fun with Coeli!
Echo.
Echo.
Echo.